inherited frmCMCommissionBill: TfrmCMCommissionBill
  Left = 279
  Top = 123
  Caption = #22996#22806#21152#24037#21333
  PixelsPerInch = 96
  TextHeight = 12
  inherited pnlDBCtrl: TPanel
    inherited pnlThirdtrade: TPanel
      inherited lblTTtraderid: TcxLabel
        AnchorX = 78
      end
      inherited cxLabel1: TcxLabel
        Left = 216
        ExplicitLeft = 216
        AnchorX = 244
      end
      inherited lblTTBalanceid: TcxLabel
        Left = 381
        ExplicitLeft = 381
        AnchorX = 433
      end
    end
    inherited lblName: TcxLabel
      Style.IsFontAssigned = True
    end
    inherited DtlPageCtrl: TcxPageControl
      Height = 245
      ExplicitHeight = 245
      ClientRectBottom = 245
      inherited tabMain: TcxTabSheet
        ExplicitHeight = 245
        inherited DtlGrid: TcxGrid
          Top = 111
          Height = 134
          ExplicitTop = 111
          ExplicitHeight = 134
          inherited DtlGridDBTableView: TcxGridDBBandedTableView
            inherited colbno: TcxGridDBBandedColumn
              Position.ColIndex = 7
            end
            inherited colProductid: TcxGridDBBandedColumn
              Position.ColIndex = 2
            end
            inherited colUnitname: TcxGridDBBandedColumn
              Position.ColIndex = 3
            end
            inherited colQuantity: TcxGridDBBandedColumn
              Position.ColIndex = 4
            end
            inherited colbQuantity: TcxGridDBBandedColumn
              Position.ColIndex = 6
            end
          end
          inherited DtlGridLevel: TcxGridLevel
            Caption = #29289#26009#26126#32454
          end
        end
        inherited sptDtl: TcxSplitter
          Top = 103
          ExplicitTop = 103
        end
        inherited DtlGrid2: TcxGrid
          Height = 103
          ExplicitHeight = 103
          inherited DtlGrid2View: TcxGridDBBandedTableView
            Bands = <
              item
                FixedKind = fkLeft
                Options.HoldOwnColumnsOnly = True
                Width = 180
              end
              item
                Options.HoldOwnColumnsOnly = True
                Width = 400
              end>
          end
        end
      end
      inherited tsSum: TcxTabSheet
        ExplicitHeight = 245
      end
    end
    inherited lblPrinted: TcxLabel
      Style.IsFontAssigned = True
    end
    inherited dynlblCreate_by: TcxLabel
      AnchorX = 221
    end
    inherited dynlblCheck_by: TcxLabel
      AnchorX = 429
    end
    inherited dynlblFilid: TcxLabel
      AnchorX = 88
    end
    inherited dynlblDeptid: TcxLabel
      AnchorX = 301
    end
    inherited dynlblEmpid: TcxLabel
      AnchorX = 505
    end
    inherited dynlblBKind: TcxLabel
      AnchorX = 149
    end
  end
  inherited Panel1: TPanel
    inherited labFuncName: TcxLabel
      Style.IsFontAssigned = True
    end
    inherited labFuncDesc: TcxLabel
      Style.IsFontAssigned = True
    end
  end
  inherited pnlBottom: TPanel
    inherited lblDepotQty: TcxLabel
      Style.IsFontAssigned = True
    end
  end
  inherited pmExec: TPopupMenu
    Left = 392
    Top = 56
    inherited muProductMakeBill: TMenuItem
      Visible = True
    end
    object muCompleted: TMenuItem [5]
      Caption = #23436#24037#22788#29702
      OnClick = muCompletedClick
    end
    object muUnCompleted: TMenuItem [6]
      Caption = #21453#23436#24037#22788#29702
      OnClick = muUnCompletedClick
    end
    inherited muMakeBatch: TMenuItem
      Enabled = False
    end
  end
  inherited pmDetail: TPopupMenu
    object muSub: TMenuItem [0]
      Caption = #36873#25321#26367#20195#21697
      OnClick = muSubClick
    end
    object N12: TMenuItem [1]
      Caption = '-'
    end
  end
  inherited cxStyleRepository1: TcxStyleRepository
    PixelsPerInch = 96
    inherited cxGridBandedTableViewStyleSheet1: TcxGridBandedTableViewStyleSheet
      BuiltIn = True
    end
  end
  inherited cdsMaster: TClientDataSet
    object cdsMasterbid: TIntegerField
      FieldName = 'bid'
    end
    object cdsMasterbkind: TIntegerField
      FieldName = 'bkind'
    end
    object cdsMasterbstate: TIntegerField
      FieldName = 'bstate'
    end
    object cdsMasterbcode: TStringField
      FieldName = 'bcode'
      Size = 40
    end
    object cdsMasterbdate: TDateTimeField
      FieldName = 'bdate'
    end
    object cdsMastertraderid: TIntegerField
      FieldName = 'traderid'
    end
    object cdsMasterfilid: TIntegerField
      FieldName = 'filid'
    end
    object cdsMasterempid: TIntegerField
      FieldName = 'empid'
    end
    object cdsMasterdeptid: TIntegerField
      FieldName = 'deptid'
    end
    object cdsMasteramount: TFloatField
      FieldName = 'amount'
    end
    object cdsMastercreate_by: TIntegerField
      FieldName = 'create_by'
    end
    object cdsMastercheck_by: TIntegerField
      FieldName = 'check_by'
    end
    object cdsMastervoucherid: TIntegerField
      FieldName = 'voucherid'
    end
    object cdsMasterdeliverydate: TDateTimeField
      FieldName = 'deliverydate'
    end
    object cdsMasterrelationcount: TByteField
      FieldName = 'relationcount'
    end
    object cdsMasterpause: TBooleanField
      FieldName = 'pause'
    end
    object cdsMastercreate_time: TDateTimeField
      FieldName = 'create_time'
    end
    object cdsMastercheck_time: TDateTimeField
      FieldName = 'check_time'
    end
    object cdsMasterupdate_time: TDateTimeField
      FieldName = 'update_time'
    end
    object cdsMasterremark: TStringField
      FieldName = 'remark'
      Size = 200
    end
    object cdsMastercustom1: TStringField
      FieldName = 'custom1'
      Size = 200
    end
    object cdsMastercustom2: TStringField
      FieldName = 'custom2'
      Size = 200
    end
    object cdsMastercustom3: TStringField
      FieldName = 'custom3'
      Size = 200
    end
    object cdsMastercustom4: TStringField
      FieldName = 'custom4'
      Size = 200
    end
    object cdsMastercustom5: TStringField
      FieldName = 'custom5'
      Size = 200
    end
    object cdsMastercustom6: TStringField
      FieldName = 'custom6'
      Size = 200
    end
    object cdsMastercustom7: TStringField
      FieldName = 'custom7'
      Size = 200
    end
    object cdsMastercustom8: TStringField
      FieldName = 'custom8'
      Size = 200
    end
    object cdsMastercustom9: TStringField
      FieldName = 'custom9'
      Size = 200
    end
    object cdsMastercustom10: TStringField
      FieldName = 'custom10'
      Size = 200
    end
    object cdsMastercustom11: TFloatField
      FieldName = 'custom11'
    end
    object cdsMastercustom12: TFloatField
      FieldName = 'custom12'
    end
    object cdsMastercustom13: TFloatField
      FieldName = 'custom13'
    end
    object cdsMastercustom14: TFloatField
      FieldName = 'custom14'
    end
    object cdsMastercustom15: TFloatField
      FieldName = 'custom15'
    end
    object cdsMastert_name: TWideStringField
      FieldName = 't_name'
      Size = 80
    end
  end
  inherited dspMaster: TDataSetProvider
    Top = 157
  end
  inherited cdsDetail: TClientDataSet
    BeforeDelete = cdsDetailBeforeDelete
    object cdsDetailbid: TIntegerField
      FieldName = 'bid'
    end
    object cdsDetailbno: TIntegerField
      FieldName = 'bno'
    end
    object cdsDetailbdtlno: TIntegerField
      FieldName = 'bdtlno'
    end
    object cdsDetailproductid: TIntegerField
      FieldName = 'productid'
    end
    object cdsDetailcprice: TFloatField
      FieldName = 'cprice'
    end
    object cdsDetailprice: TFloatField
      FieldName = 'price'
    end
    object cdsDetailquantity: TFloatField
      FieldName = 'quantity'
    end
    object cdsDetailamount: TFloatField
      FieldName = 'amount'
    end
    object cdsDetailunitid: TIntegerField
      FieldName = 'unitid'
    end
    object cdsDetailbquantity: TFloatField
      FieldName = 'bquantity'
    end
    object cdsDetailbprice: TFloatField
      FieldName = 'bprice'
    end
    object cdsDetailunit1qty: TFloatField
      FieldName = 'unit1qty'
    end
    object cdsDetailunit2qty: TFloatField
      FieldName = 'unit2qty'
    end
    object cdsDetailunit3qty: TFloatField
      FieldName = 'unit3qty'
    end
    object cdsDetailassqty: TFloatField
      FieldName = 'assqty'
    end
    object cdsDetailrelationassqty: TFloatField
      FieldName = 'relationassqty'
    end
    object cdsDetailbatchcode: TStringField
      FieldName = 'batchcode'
      Size = 200
    end
    object cdsDetailproductdate: TDateTimeField
      FieldName = 'productdate'
    end
    object cdsDetailvaliddate: TDateTimeField
      FieldName = 'validdate'
    end
    object cdsDetaildrawqty: TFloatField
      FieldName = 'drawqty'
    end
    object cdsDetaildrawamt: TFloatField
      FieldName = 'drawamt'
    end
    object cdsDetailwastedqty: TFloatField
      FieldName = 'wastedqty'
    end
    object cdsDetailwastedamt: TFloatField
      FieldName = 'wastedamt'
    end
    object cdsDetailrelationcount: TByteField
      FieldName = 'relationcount'
    end
    object cdsDetailrelationbtype: TIntegerField
      FieldName = 'relationbtype'
    end
    object cdsDetailrelationbid: TIntegerField
      FieldName = 'relationbid'
    end
    object cdsDetailrelationbno: TIntegerField
      FieldName = 'relationbno'
    end
    object cdsDetailrelationpid: TIntegerField
      FieldName = 'relationpid'
    end
    object cdsDetailrelationqty: TFloatField
      FieldName = 'relationqty'
    end
    object cdsDetailioqty: TFloatField
      FieldName = 'ioqty'
    end
    object cdsDetailexplan: TStringField
      FieldName = 'explan'
      Size = 200
    end
    object cdsDetailcustom1: TStringField
      FieldName = 'custom1'
      Size = 200
    end
    object cdsDetailcustom2: TStringField
      FieldName = 'custom2'
      Size = 200
    end
    object cdsDetailcustom3: TStringField
      FieldName = 'custom3'
      Size = 200
    end
    object cdsDetailcustom4: TStringField
      FieldName = 'custom4'
      Size = 200
    end
    object cdsDetailcustom5: TStringField
      FieldName = 'custom5'
      Size = 200
    end
    object cdsDetailcustom6: TStringField
      FieldName = 'custom6'
      Size = 200
    end
    object cdsDetailcustom7: TStringField
      FieldName = 'custom7'
      Size = 200
    end
    object cdsDetailcustom8: TStringField
      FieldName = 'custom8'
      Size = 200
    end
    object cdsDetailcustom9: TStringField
      FieldName = 'custom9'
      Size = 200
    end
    object cdsDetailcustom10: TStringField
      FieldName = 'custom10'
      Size = 200
    end
    object cdsDetailcustom11: TFloatField
      FieldName = 'custom11'
    end
    object cdsDetailcustom12: TFloatField
      FieldName = 'custom12'
    end
    object cdsDetailcustom13: TFloatField
      FieldName = 'custom13'
    end
    object cdsDetailcustom14: TFloatField
      FieldName = 'custom14'
    end
    object cdsDetailcustom15: TFloatField
      FieldName = 'custom15'
    end
    object cdsDetailsaleorderbcode: TStringField
      FieldName = 'saleorderbcode'
      Size = 40
    end
    object cdsDetailrelationbcode: TStringField
      FieldName = 'relationbcode'
      Size = 40
    end
    object cdsDetaillength: TFloatField
      FieldName = 'length'
    end
    object cdsDetailwidth: TFloatField
      FieldName = 'width'
    end
    object cdsDetailheight: TFloatField
      FieldName = 'height'
    end
    object cdsDetailspecificweight: TFloatField
      FieldName = 'specificweight'
    end
    object cdsDetailcustom16: TFloatField
      FieldName = 'custom16'
    end
    object cdsDetailcustom17: TFloatField
      FieldName = 'custom17'
    end
    object cdsDetailcustom18: TFloatField
      FieldName = 'custom18'
    end
    object cdsDetailcustom19: TFloatField
      FieldName = 'custom19'
    end
    object cdsDetailcustom20: TFloatField
      FieldName = 'custom20'
    end
    object cdsDetailpartid: TIntegerField
      FieldName = 'partid'
    end
    object cdsDetailqtyformulaid: TIntegerField
      FieldName = 'qtyformulaid'
    end
    object cdsDetaillengthformulaid: TIntegerField
      FieldName = 'lengthformulaid'
    end
    object cdsDetailwidthformulaid: TIntegerField
      FieldName = 'widthformulaid'
    end
    object cdsDetailheightformulaid: TIntegerField
      FieldName = 'heightformulaid'
    end
    object cdsDetailrawqty: TFloatField
      FieldName = 'rawqty'
    end
    object cdsDetailwasterate: TFloatField
      FieldName = 'wasterate'
    end
    object cdsDetailp_code: TStringField
      FieldName = 'p_code'
      Size = 40
    end
    object cdsDetailp_name: TWideStringField
      FieldName = 'p_name'
      Size = 60
    end
    object cdsDetailp_spec: TWideStringField
      FieldName = 'p_spec'
      Size = 60
    end
    object cdsDetailp_abname: TWideStringField
      FieldName = 'p_abname'
      Size = 60
    end
    object cdsDetailp_custom1: TStringField
      FieldName = 'p_custom1'
      Size = 100
    end
    object cdsDetailp_custom2: TStringField
      FieldName = 'p_custom2'
      Size = 100
    end
    object cdsDetailp_custom3: TStringField
      FieldName = 'p_custom3'
      Size = 100
    end
    object cdsDetailp_custom4: TStringField
      FieldName = 'p_custom4'
      Size = 100
    end
    object cdsDetailp_custom5: TStringField
      FieldName = 'p_custom5'
      Size = 100
    end
    object cdsDetailp_custom6: TStringField
      FieldName = 'p_custom6'
      Size = 100
    end
    object cdsDetailp_custom7: TStringField
      FieldName = 'p_custom7'
      Size = 100
    end
    object cdsDetailp_custom8: TStringField
      FieldName = 'p_custom8'
      Size = 100
    end
    object cdsDetailp_custom9: TStringField
      FieldName = 'p_custom9'
      Size = 100
    end
    object cdsDetailp_custom10: TStringField
      FieldName = 'p_custom10'
      Size = 100
    end
    object cdsDetailproducttypename: TWideStringField
      FieldName = 'producttypename'
      Size = 60
    end
    object cdsDetailproducttypeid: TIntegerField
      FieldName = 'producttypeid'
    end
    object cdsDetailunitname: TWideStringField
      FieldName = 'unitname'
      Size = 40
    end
    object cdsDetailbarcode: TWideStringField
      FieldName = 'barcode'
      Size = 40
    end
    object cdsDetailpartname: TWideStringField
      FieldName = 'partname'
      Size = 60
    end
    object cdsDetailformulaname: TWideStringField
      FieldName = 'formulaname'
      Size = 200
    end
    object cdsDetaillformulaname: TWideStringField
      FieldName = 'lformulaname'
      Size = 200
    end
    object cdsDetailwformulaname: TWideStringField
      FieldName = 'wformulaname'
      Size = 200
    end
    object cdsDetailhformulaname: TWideStringField
      FieldName = 'hformulaname'
      Size = 200
    end
    object cdsDetailfactqty: TFloatField
      FieldName = 'factqty'
    end
    object cdsDetailbookqty: TFloatField
      FieldName = 'bookqty'
    end
    object cdsDetailproductpic: TBlobField
      FieldName = 'productpic'
    end
  end
  inherited qryDetail: TUniQuery
    SQL.Strings = (
      'select d.*'
      
        '     ,p.code p_code,p.name p_name,p.spec p_spec,p.abname p_abnam' +
        'e'
      
        '     ,p.custom1 p_custom1,p.custom2 p_custom2,p.custom3 p_custom' +
        '3,p.custom4 p_custom4,p.custom5 p_custom5'
      
        '     ,p.custom6 p_custom6,p.custom7 p_custom7,p.custom8 p_custom' +
        '8,p.custom9 p_custom9,p.custom10 p_custom10'
      '     ,t.name as producttypename,p.producttypeid'
      '     ,u.unitname,u.barcode'
      '     ,pt.name partname,pf.calcexpressshow formulaname'
      
        '     ,plf.calcexpressshow lformulaname, pwf.calcexpressshow wfor' +
        'mulaname, phf.calcexpressshow hformulaname'
      '     ,cast(null as image) as productpic'
      '     from tb_commissionraw d '
      '     left join td_product p on d.productid=p.p_id '
      '     left join td_producttype t on p.producttypeid=t.id'
      '     left join td_unitprice u on d.unitid=u.unitid '
      '     left join td_productbompart pt on d.partid=pt.id'
      '     left join td_productbomformula pf on d.qtyformulaid=pf.id '
      
        '     left join td_productbomformula plf on d.lengthformulaid=pf.' +
        'id  '
      
        '     left join td_productbomformula pwf on d.widthformulaid=pf.i' +
        'd  '
      
        '     left join td_productbomformula phf on d.heightformulaid=pf.' +
        'id'
      '     where bid=0')
    object qryDetailbid: TIntegerField
      FieldName = 'bid'
    end
    object qryDetailbno: TIntegerField
      FieldName = 'bno'
    end
    object qryDetailbdtlno: TIntegerField
      FieldName = 'bdtlno'
    end
    object qryDetailproductid: TIntegerField
      FieldName = 'productid'
    end
    object qryDetailcprice: TFloatField
      FieldName = 'cprice'
    end
    object qryDetailprice: TFloatField
      FieldName = 'price'
    end
    object qryDetailquantity: TFloatField
      FieldName = 'quantity'
    end
    object qryDetailamount: TFloatField
      FieldName = 'amount'
    end
    object qryDetailunitid: TIntegerField
      FieldName = 'unitid'
    end
    object qryDetailbquantity: TFloatField
      FieldName = 'bquantity'
    end
    object qryDetailbprice: TFloatField
      FieldName = 'bprice'
    end
    object qryDetailunit1qty: TFloatField
      FieldName = 'unit1qty'
    end
    object qryDetailunit2qty: TFloatField
      FieldName = 'unit2qty'
    end
    object qryDetailunit3qty: TFloatField
      FieldName = 'unit3qty'
    end
    object qryDetailassqty: TFloatField
      FieldName = 'assqty'
    end
    object qryDetailrelationassqty: TFloatField
      FieldName = 'relationassqty'
    end
    object qryDetailbatchcode: TStringField
      FieldName = 'batchcode'
      Size = 200
    end
    object qryDetailproductdate: TDateTimeField
      FieldName = 'productdate'
    end
    object qryDetailvaliddate: TDateTimeField
      FieldName = 'validdate'
    end
    object qryDetaildrawqty: TFloatField
      FieldName = 'drawqty'
    end
    object qryDetaildrawamt: TFloatField
      FieldName = 'drawamt'
    end
    object qryDetailwastedqty: TFloatField
      FieldName = 'wastedqty'
    end
    object qryDetailwastedamt: TFloatField
      FieldName = 'wastedamt'
    end
    object qryDetailrelationcount: TByteField
      FieldName = 'relationcount'
    end
    object qryDetailrelationbtype: TIntegerField
      FieldName = 'relationbtype'
    end
    object qryDetailrelationbid: TIntegerField
      FieldName = 'relationbid'
    end
    object qryDetailrelationbno: TIntegerField
      FieldName = 'relationbno'
    end
    object qryDetailrelationpid: TIntegerField
      FieldName = 'relationpid'
    end
    object qryDetailrelationqty: TFloatField
      FieldName = 'relationqty'
    end
    object qryDetailioqty: TFloatField
      FieldName = 'ioqty'
    end
    object qryDetailexplan: TStringField
      FieldName = 'explan'
      Size = 200
    end
    object qryDetailcustom1: TStringField
      FieldName = 'custom1'
      Size = 200
    end
    object qryDetailcustom2: TStringField
      FieldName = 'custom2'
      Size = 200
    end
    object qryDetailcustom3: TStringField
      FieldName = 'custom3'
      Size = 200
    end
    object qryDetailcustom4: TStringField
      FieldName = 'custom4'
      Size = 200
    end
    object qryDetailcustom5: TStringField
      FieldName = 'custom5'
      Size = 200
    end
    object qryDetailcustom6: TStringField
      FieldName = 'custom6'
      Size = 200
    end
    object qryDetailcustom7: TStringField
      FieldName = 'custom7'
      Size = 200
    end
    object qryDetailcustom8: TStringField
      FieldName = 'custom8'
      Size = 200
    end
    object qryDetailcustom9: TStringField
      FieldName = 'custom9'
      Size = 200
    end
    object qryDetailcustom10: TStringField
      FieldName = 'custom10'
      Size = 200
    end
    object qryDetailcustom11: TFloatField
      FieldName = 'custom11'
    end
    object qryDetailcustom12: TFloatField
      FieldName = 'custom12'
    end
    object qryDetailcustom13: TFloatField
      FieldName = 'custom13'
    end
    object qryDetailcustom14: TFloatField
      FieldName = 'custom14'
    end
    object qryDetailcustom15: TFloatField
      FieldName = 'custom15'
    end
    object qryDetailsaleorderbcode: TStringField
      FieldName = 'saleorderbcode'
      Size = 40
    end
    object qryDetailrelationbcode: TStringField
      FieldName = 'relationbcode'
      Size = 40
    end
    object qryDetaillength: TFloatField
      FieldName = 'length'
    end
    object qryDetailwidth: TFloatField
      FieldName = 'width'
    end
    object qryDetailheight: TFloatField
      FieldName = 'height'
    end
    object qryDetailspecificweight: TFloatField
      FieldName = 'specificweight'
    end
    object qryDetailcustom16: TFloatField
      FieldName = 'custom16'
    end
    object qryDetailcustom17: TFloatField
      FieldName = 'custom17'
    end
    object qryDetailcustom18: TFloatField
      FieldName = 'custom18'
    end
    object qryDetailcustom19: TFloatField
      FieldName = 'custom19'
    end
    object qryDetailcustom20: TFloatField
      FieldName = 'custom20'
    end
    object qryDetailpartid: TIntegerField
      FieldName = 'partid'
    end
    object qryDetailqtyformulaid: TIntegerField
      FieldName = 'qtyformulaid'
    end
    object qryDetaillengthformulaid: TIntegerField
      FieldName = 'lengthformulaid'
    end
    object qryDetailwidthformulaid: TIntegerField
      FieldName = 'widthformulaid'
    end
    object qryDetailheightformulaid: TIntegerField
      FieldName = 'heightformulaid'
    end
    object qryDetailrawqty: TFloatField
      FieldName = 'rawqty'
    end
    object qryDetailwasterate: TFloatField
      FieldName = 'wasterate'
    end
    object qryDetailp_code: TStringField
      FieldName = 'p_code'
      Size = 40
    end
    object qryDetailp_name: TWideStringField
      FieldName = 'p_name'
      Size = 60
    end
    object qryDetailp_spec: TWideStringField
      FieldName = 'p_spec'
      Size = 60
    end
    object qryDetailp_abname: TWideStringField
      FieldName = 'p_abname'
      Size = 60
    end
    object qryDetailp_custom1: TStringField
      FieldName = 'p_custom1'
      Size = 100
    end
    object qryDetailp_custom2: TStringField
      FieldName = 'p_custom2'
      Size = 100
    end
    object qryDetailp_custom3: TStringField
      FieldName = 'p_custom3'
      Size = 100
    end
    object qryDetailp_custom4: TStringField
      FieldName = 'p_custom4'
      Size = 100
    end
    object qryDetailp_custom5: TStringField
      FieldName = 'p_custom5'
      Size = 100
    end
    object qryDetailp_custom6: TStringField
      FieldName = 'p_custom6'
      Size = 100
    end
    object qryDetailp_custom7: TStringField
      FieldName = 'p_custom7'
      Size = 100
    end
    object qryDetailp_custom8: TStringField
      FieldName = 'p_custom8'
      Size = 100
    end
    object qryDetailp_custom9: TStringField
      FieldName = 'p_custom9'
      Size = 100
    end
    object qryDetailp_custom10: TStringField
      FieldName = 'p_custom10'
      Size = 100
    end
    object qryDetailproducttypename: TWideStringField
      FieldName = 'producttypename'
      Size = 60
    end
    object qryDetailproducttypeid: TIntegerField
      FieldName = 'producttypeid'
    end
    object qryDetailunitname: TWideStringField
      FieldName = 'unitname'
      Size = 40
    end
    object qryDetailbarcode: TWideStringField
      FieldName = 'barcode'
      Size = 40
    end
    object qryDetailpartname: TWideStringField
      FieldName = 'partname'
      Size = 60
    end
    object qryDetailformulaname: TWideStringField
      FieldName = 'formulaname'
      Size = 200
    end
    object qryDetaillformulaname: TWideStringField
      FieldName = 'lformulaname'
      Size = 200
    end
    object qryDetailwformulaname: TWideStringField
      FieldName = 'wformulaname'
      Size = 200
    end
    object qryDetailhformulaname: TWideStringField
      FieldName = 'hformulaname'
      Size = 200
    end
    object qryDetailfactqty: TFloatField
      FieldName = 'factqty'
    end
    object qryDetailbookqty: TFloatField
      FieldName = 'bookqty'
    end
    object qryDetailproductpic: TBlobField
      FieldName = 'productpic'
    end
  end
  inherited MainDataSet: TUniQuery
    SQL.Strings = (
      'select top 1 m.*, t.name as t_name '
      '     from tb_commission m '
      '     left join td_trader t on (t.traderid=m.traderid) '
      '     where 1=1')
    object MainDataSetbid: TIntegerField
      FieldName = 'bid'
    end
    object MainDataSetbkind: TIntegerField
      FieldName = 'bkind'
    end
    object MainDataSetbstate: TIntegerField
      FieldName = 'bstate'
    end
    object MainDataSetbcode: TStringField
      FieldName = 'bcode'
      Size = 40
    end
    object MainDataSetbdate: TDateTimeField
      FieldName = 'bdate'
    end
    object MainDataSettraderid: TIntegerField
      FieldName = 'traderid'
    end
    object MainDataSetfilid: TIntegerField
      FieldName = 'filid'
    end
    object MainDataSetempid: TIntegerField
      FieldName = 'empid'
    end
    object MainDataSetdeptid: TIntegerField
      FieldName = 'deptid'
    end
    object MainDataSetamount: TFloatField
      FieldName = 'amount'
    end
    object MainDataSetcreate_by: TIntegerField
      FieldName = 'create_by'
    end
    object MainDataSetcheck_by: TIntegerField
      FieldName = 'check_by'
    end
    object MainDataSetvoucherid: TIntegerField
      FieldName = 'voucherid'
    end
    object MainDataSetdeliverydate: TDateTimeField
      FieldName = 'deliverydate'
    end
    object MainDataSetrelationcount: TByteField
      FieldName = 'relationcount'
    end
    object MainDataSetpause: TBooleanField
      FieldName = 'pause'
    end
    object MainDataSetcreate_time: TDateTimeField
      FieldName = 'create_time'
    end
    object MainDataSetcheck_time: TDateTimeField
      FieldName = 'check_time'
    end
    object MainDataSetupdate_time: TDateTimeField
      FieldName = 'update_time'
    end
    object MainDataSetremark: TStringField
      FieldName = 'remark'
      Size = 200
    end
    object MainDataSetcustom1: TStringField
      FieldName = 'custom1'
      Size = 200
    end
    object MainDataSetcustom2: TStringField
      FieldName = 'custom2'
      Size = 200
    end
    object MainDataSetcustom3: TStringField
      FieldName = 'custom3'
      Size = 200
    end
    object MainDataSetcustom4: TStringField
      FieldName = 'custom4'
      Size = 200
    end
    object MainDataSetcustom5: TStringField
      FieldName = 'custom5'
      Size = 200
    end
    object MainDataSetcustom6: TStringField
      FieldName = 'custom6'
      Size = 200
    end
    object MainDataSetcustom7: TStringField
      FieldName = 'custom7'
      Size = 200
    end
    object MainDataSetcustom8: TStringField
      FieldName = 'custom8'
      Size = 200
    end
    object MainDataSetcustom9: TStringField
      FieldName = 'custom9'
      Size = 200
    end
    object MainDataSetcustom10: TStringField
      FieldName = 'custom10'
      Size = 200
    end
    object MainDataSetcustom11: TFloatField
      FieldName = 'custom11'
    end
    object MainDataSetcustom12: TFloatField
      FieldName = 'custom12'
    end
    object MainDataSetcustom13: TFloatField
      FieldName = 'custom13'
    end
    object MainDataSetcustom14: TFloatField
      FieldName = 'custom14'
    end
    object MainDataSetcustom15: TFloatField
      FieldName = 'custom15'
    end
    object MainDataSett_name: TWideStringField
      FieldName = 't_name'
      Size = 80
    end
  end
  inherited cdsDetail2: TClientDataSet
    object cdsDetail2bid: TIntegerField
      FieldName = 'bid'
    end
    object cdsDetail2bno: TIntegerField
      FieldName = 'bno'
    end
    object cdsDetail2borderno: TIntegerField
      FieldName = 'borderno'
    end
    object cdsDetail2productid: TIntegerField
      FieldName = 'productid'
    end
    object cdsDetail2unitid: TIntegerField
      FieldName = 'unitid'
    end
    object cdsDetail2bomid: TIntegerField
      FieldName = 'bomid'
    end
    object cdsDetail2quantity: TFloatField
      FieldName = 'quantity'
    end
    object cdsDetail2bquantity: TFloatField
      FieldName = 'bquantity'
    end
    object cdsDetail2completedqty: TFloatField
      FieldName = 'completedqty'
    end
    object cdsDetail2deliverydate: TDateTimeField
      FieldName = 'deliverydate'
    end
    object cdsDetail2relationcount: TByteField
      FieldName = 'relationcount'
    end
    object cdsDetail2relationbtype: TIntegerField
      FieldName = 'relationbtype'
    end
    object cdsDetail2relationbno: TIntegerField
      FieldName = 'relationbno'
    end
    object cdsDetail2relationbid: TIntegerField
      FieldName = 'relationbid'
    end
    object cdsDetail2pause: TBooleanField
      FieldName = 'pause'
    end
    object cdsDetail2explan: TStringField
      FieldName = 'explan'
      Size = 200
    end
    object cdsDetail2price: TFloatField
      FieldName = 'price'
    end
    object cdsDetail2bprice: TFloatField
      FieldName = 'bprice'
    end
    object cdsDetail2unit1qty: TFloatField
      FieldName = 'unit1qty'
    end
    object cdsDetail2unit2qty: TFloatField
      FieldName = 'unit2qty'
    end
    object cdsDetail2unit3qty: TFloatField
      FieldName = 'unit3qty'
    end
    object cdsDetail2assqty: TFloatField
      FieldName = 'assqty'
    end
    object cdsDetail2relationassqty: TFloatField
      FieldName = 'relationassqty'
    end
    object cdsDetail2amount: TFloatField
      FieldName = 'amount'
    end
    object cdsDetail2machiningamt: TFloatField
      FieldName = 'machiningamt'
    end
    object cdsDetail2relationqty: TFloatField
      FieldName = 'relationqty'
    end
    object cdsDetail2custom1: TStringField
      FieldName = 'custom1'
      Size = 200
    end
    object cdsDetail2custom2: TStringField
      FieldName = 'custom2'
      Size = 200
    end
    object cdsDetail2custom3: TStringField
      FieldName = 'custom3'
      Size = 200
    end
    object cdsDetail2custom4: TStringField
      FieldName = 'custom4'
      Size = 200
    end
    object cdsDetail2custom5: TStringField
      FieldName = 'custom5'
      Size = 200
    end
    object cdsDetail2custom6: TStringField
      FieldName = 'custom6'
      Size = 200
    end
    object cdsDetail2custom7: TStringField
      FieldName = 'custom7'
      Size = 200
    end
    object cdsDetail2custom8: TStringField
      FieldName = 'custom8'
      Size = 200
    end
    object cdsDetail2custom9: TStringField
      FieldName = 'custom9'
      Size = 200
    end
    object cdsDetail2custom10: TStringField
      FieldName = 'custom10'
      Size = 200
    end
    object cdsDetail2custom11: TFloatField
      FieldName = 'custom11'
    end
    object cdsDetail2custom12: TFloatField
      FieldName = 'custom12'
    end
    object cdsDetail2custom13: TFloatField
      FieldName = 'custom13'
    end
    object cdsDetail2custom14: TFloatField
      FieldName = 'custom14'
    end
    object cdsDetail2custom15: TFloatField
      FieldName = 'custom15'
    end
    object cdsDetail2saleorderbcode: TStringField
      FieldName = 'saleorderbcode'
      Size = 40
    end
    object cdsDetail2relationbcode: TStringField
      FieldName = 'relationbcode'
      Size = 40
    end
    object cdsDetail2length: TFloatField
      FieldName = 'length'
    end
    object cdsDetail2width: TFloatField
      FieldName = 'width'
    end
    object cdsDetail2height: TFloatField
      FieldName = 'height'
    end
    object cdsDetail2specificweight: TFloatField
      FieldName = 'specificweight'
    end
    object cdsDetail2custom16: TFloatField
      FieldName = 'custom16'
    end
    object cdsDetail2custom17: TFloatField
      FieldName = 'custom17'
    end
    object cdsDetail2custom18: TFloatField
      FieldName = 'custom18'
    end
    object cdsDetail2custom19: TFloatField
      FieldName = 'custom19'
    end
    object cdsDetail2custom20: TFloatField
      FieldName = 'custom20'
    end
    object cdsDetail2workshopid: TIntegerField
      FieldName = 'workshopid'
    end
    object cdsDetail2traderid: TIntegerField
      FieldName = 'traderid'
    end
    object cdsDetail2relationbcode_1: TStringField
      FieldName = 'relationbcode_1'
      Size = 30
    end
    object cdsDetail2p_code: TStringField
      FieldName = 'p_code'
      Size = 40
    end
    object cdsDetail2p_name: TWideStringField
      FieldName = 'p_name'
      Size = 60
    end
    object cdsDetail2p_spec: TWideStringField
      FieldName = 'p_spec'
      Size = 60
    end
    object cdsDetail2p_abname: TWideStringField
      FieldName = 'p_abname'
      Size = 60
    end
    object cdsDetail2p_custom1: TStringField
      FieldName = 'p_custom1'
      Size = 100
    end
    object cdsDetail2p_custom2: TStringField
      FieldName = 'p_custom2'
      Size = 100
    end
    object cdsDetail2p_custom3: TStringField
      FieldName = 'p_custom3'
      Size = 100
    end
    object cdsDetail2p_custom4: TStringField
      FieldName = 'p_custom4'
      Size = 100
    end
    object cdsDetail2p_custom5: TStringField
      FieldName = 'p_custom5'
      Size = 100
    end
    object cdsDetail2p_custom6: TStringField
      FieldName = 'p_custom6'
      Size = 100
    end
    object cdsDetail2p_custom7: TStringField
      FieldName = 'p_custom7'
      Size = 100
    end
    object cdsDetail2p_custom8: TStringField
      FieldName = 'p_custom8'
      Size = 100
    end
    object cdsDetail2p_custom9: TStringField
      FieldName = 'p_custom9'
      Size = 100
    end
    object cdsDetail2p_custom10: TStringField
      FieldName = 'p_custom10'
      Size = 100
    end
    object cdsDetail2producttypename: TWideStringField
      FieldName = 'producttypename'
      Size = 60
    end
    object cdsDetail2producttypeid: TIntegerField
      FieldName = 'producttypeid'
    end
    object cdsDetail2t_name: TWideStringField
      FieldName = 't_name'
      Size = 80
    end
    object cdsDetail2unitname: TWideStringField
      FieldName = 'unitname'
      Size = 40
    end
    object cdsDetail2barcode: TWideStringField
      FieldName = 'barcode'
      Size = 40
    end
    object cdsDetail2workshopname: TStringField
      FieldName = 'workshopname'
      Size = 60
    end
    object cdsDetail2bomcode: TStringField
      FieldName = 'bomcode'
      Size = 40
    end
    object cdsDetail2bomname: TStringField
      FieldName = 'bomname'
      Size = 60
    end
    object cdsDetail2factqty: TFloatField
      FieldName = 'factqty'
    end
    object cdsDetail2bookqty: TFloatField
      FieldName = 'bookqty'
    end
    object cdsDetail2productpic: TBlobField
      FieldName = 'productpic'
    end
  end
  inherited pmDetail2: TPopupMenu
    object N4: TMenuItem
      Caption = '-'
    end
    object muProductCompleted: TMenuItem
      Caption = #23436#24037#22788#29702
      OnClick = muProductCompletedClick
    end
    object muProductUnCompleted: TMenuItem
      Caption = #21453#23436#24037#22788#29702
      OnClick = muProductUnCompletedClick
    end
    object muReCalcPart: TMenuItem
      Caption = '-'
    end
    object muReCalcRawMeasure: TMenuItem
      Caption = #37325#26032#35745#31639#29289#26009#24230#37327#21333#20301
      OnClick = muReCalcRawMeasureClick
    end
  end
  inherited qryDetail2: TUniQuery
    SQL.Strings = (
      'select d.*'
      
        '     ,dbo.f_getrelationbcode(d.relationbtype,d.relationbid) as r' +
        'elationbcode'
      
        '     ,p.code p_code,p.name p_name,p.spec p_spec,p.abname p_abnam' +
        'e'
      
        '     ,p.custom1 p_custom1,p.custom2 p_custom2,p.custom3 p_custom' +
        '3,p.custom4 p_custom4,p.custom5 p_custom5'
      
        '     ,p.custom6 p_custom6,p.custom7 p_custom7,p.custom8 p_custom' +
        '8,p.custom9 p_custom9,p.custom10 p_custom10'
      '     ,pt.name as producttypename,p.producttypeid,t.name t_name'
      '     ,u.unitname,u.barcode,w.name workshopname'
      '     ,v.code bomcode, v.name bomname'
      '     ,cast(null as image) as productpic'
      '     from tb_commissiondtl d '
      '     left join td_product p on d.productid=p.p_id '
      '     left join td_producttype pt on p.producttypeid=pt.id'
      '     left join td_productbomver v on d.bomid=v.bomid '
      '     left join td_unitprice u on d.unitid=u.unitid '
      '     left join td_workshop w on d.workshopid=w.workshopid'
      '     left join td_trader t on d.traderid=t.traderid'
      '     where bid=0')
    object qryDetail2bid: TIntegerField
      FieldName = 'bid'
    end
    object qryDetail2bno: TIntegerField
      FieldName = 'bno'
    end
    object qryDetail2borderno: TIntegerField
      FieldName = 'borderno'
    end
    object qryDetail2productid: TIntegerField
      FieldName = 'productid'
    end
    object qryDetail2unitid: TIntegerField
      FieldName = 'unitid'
    end
    object qryDetail2bomid: TIntegerField
      FieldName = 'bomid'
    end
    object qryDetail2quantity: TFloatField
      FieldName = 'quantity'
    end
    object qryDetail2bquantity: TFloatField
      FieldName = 'bquantity'
    end
    object qryDetail2completedqty: TFloatField
      FieldName = 'completedqty'
    end
    object qryDetail2deliverydate: TDateTimeField
      FieldName = 'deliverydate'
    end
    object qryDetail2relationcount: TByteField
      FieldName = 'relationcount'
    end
    object qryDetail2relationbtype: TIntegerField
      FieldName = 'relationbtype'
    end
    object qryDetail2relationbno: TIntegerField
      FieldName = 'relationbno'
    end
    object qryDetail2relationbid: TIntegerField
      FieldName = 'relationbid'
    end
    object qryDetail2pause: TBooleanField
      FieldName = 'pause'
    end
    object qryDetail2explan: TStringField
      FieldName = 'explan'
      Size = 200
    end
    object qryDetail2price: TFloatField
      FieldName = 'price'
    end
    object qryDetail2bprice: TFloatField
      FieldName = 'bprice'
    end
    object qryDetail2unit1qty: TFloatField
      FieldName = 'unit1qty'
    end
    object qryDetail2unit2qty: TFloatField
      FieldName = 'unit2qty'
    end
    object qryDetail2unit3qty: TFloatField
      FieldName = 'unit3qty'
    end
    object qryDetail2assqty: TFloatField
      FieldName = 'assqty'
    end
    object qryDetail2relationassqty: TFloatField
      FieldName = 'relationassqty'
    end
    object qryDetail2amount: TFloatField
      FieldName = 'amount'
    end
    object qryDetail2machiningamt: TFloatField
      FieldName = 'machiningamt'
    end
    object qryDetail2relationqty: TFloatField
      FieldName = 'relationqty'
    end
    object qryDetail2custom1: TStringField
      FieldName = 'custom1'
      Size = 200
    end
    object qryDetail2custom2: TStringField
      FieldName = 'custom2'
      Size = 200
    end
    object qryDetail2custom3: TStringField
      FieldName = 'custom3'
      Size = 200
    end
    object qryDetail2custom4: TStringField
      FieldName = 'custom4'
      Size = 200
    end
    object qryDetail2custom5: TStringField
      FieldName = 'custom5'
      Size = 200
    end
    object qryDetail2custom6: TStringField
      FieldName = 'custom6'
      Size = 200
    end
    object qryDetail2custom7: TStringField
      FieldName = 'custom7'
      Size = 200
    end
    object qryDetail2custom8: TStringField
      FieldName = 'custom8'
      Size = 200
    end
    object qryDetail2custom9: TStringField
      FieldName = 'custom9'
      Size = 200
    end
    object qryDetail2custom10: TStringField
      FieldName = 'custom10'
      Size = 200
    end
    object qryDetail2custom11: TFloatField
      FieldName = 'custom11'
    end
    object qryDetail2custom12: TFloatField
      FieldName = 'custom12'
    end
    object qryDetail2custom13: TFloatField
      FieldName = 'custom13'
    end
    object qryDetail2custom14: TFloatField
      FieldName = 'custom14'
    end
    object qryDetail2custom15: TFloatField
      FieldName = 'custom15'
    end
    object qryDetail2saleorderbcode: TStringField
      FieldName = 'saleorderbcode'
      Size = 40
    end
    object qryDetail2relationbcode: TStringField
      FieldName = 'relationbcode'
      Size = 40
    end
    object qryDetail2length: TFloatField
      FieldName = 'length'
    end
    object qryDetail2width: TFloatField
      FieldName = 'width'
    end
    object qryDetail2height: TFloatField
      FieldName = 'height'
    end
    object qryDetail2specificweight: TFloatField
      FieldName = 'specificweight'
    end
    object qryDetail2custom16: TFloatField
      FieldName = 'custom16'
    end
    object qryDetail2custom17: TFloatField
      FieldName = 'custom17'
    end
    object qryDetail2custom18: TFloatField
      FieldName = 'custom18'
    end
    object qryDetail2custom19: TFloatField
      FieldName = 'custom19'
    end
    object qryDetail2custom20: TFloatField
      FieldName = 'custom20'
    end
    object qryDetail2workshopid: TIntegerField
      FieldName = 'workshopid'
    end
    object qryDetail2traderid: TIntegerField
      FieldName = 'traderid'
    end
    object qryDetail2relationbcode_1: TStringField
      FieldName = 'relationbcode_1'
      Size = 30
    end
    object qryDetail2p_code: TStringField
      FieldName = 'p_code'
      Size = 40
    end
    object qryDetail2p_name: TWideStringField
      FieldName = 'p_name'
      Size = 60
    end
    object qryDetail2p_spec: TWideStringField
      FieldName = 'p_spec'
      Size = 60
    end
    object qryDetail2p_abname: TWideStringField
      FieldName = 'p_abname'
      Size = 60
    end
    object qryDetail2p_custom1: TStringField
      FieldName = 'p_custom1'
      Size = 100
    end
    object qryDetail2p_custom2: TStringField
      FieldName = 'p_custom2'
      Size = 100
    end
    object qryDetail2p_custom3: TStringField
      FieldName = 'p_custom3'
      Size = 100
    end
    object qryDetail2p_custom4: TStringField
      FieldName = 'p_custom4'
      Size = 100
    end
    object qryDetail2p_custom5: TStringField
      FieldName = 'p_custom5'
      Size = 100
    end
    object qryDetail2p_custom6: TStringField
      FieldName = 'p_custom6'
      Size = 100
    end
    object qryDetail2p_custom7: TStringField
      FieldName = 'p_custom7'
      Size = 100
    end
    object qryDetail2p_custom8: TStringField
      FieldName = 'p_custom8'
      Size = 100
    end
    object qryDetail2p_custom9: TStringField
      FieldName = 'p_custom9'
      Size = 100
    end
    object qryDetail2p_custom10: TStringField
      FieldName = 'p_custom10'
      Size = 100
    end
    object qryDetail2producttypename: TWideStringField
      FieldName = 'producttypename'
      Size = 60
    end
    object qryDetail2producttypeid: TIntegerField
      FieldName = 'producttypeid'
    end
    object qryDetail2t_name: TWideStringField
      FieldName = 't_name'
      Size = 80
    end
    object qryDetail2unitname: TWideStringField
      FieldName = 'unitname'
      Size = 40
    end
    object qryDetail2barcode: TWideStringField
      FieldName = 'barcode'
      Size = 40
    end
    object qryDetail2workshopname: TStringField
      FieldName = 'workshopname'
      Size = 60
    end
    object qryDetail2bomcode: TStringField
      FieldName = 'bomcode'
      Size = 40
    end
    object qryDetail2bomname: TStringField
      FieldName = 'bomname'
      Size = 60
    end
    object qryDetail2factqty: TFloatField
      FieldName = 'factqty'
    end
    object qryDetail2bookqty: TFloatField
      FieldName = 'bookqty'
    end
    object qryDetail2productpic: TBlobField
      FieldName = 'productpic'
    end
  end
  object qryRawSub: TUniQuery
    SQLInsert.Strings = (
      'INSERT INTO tb_commissionrawsub'
      
        '  (bid, bno, bdtlno, subproductid, orderno, rate, quantity, draw' +
        'qty, wastedqty, explan, assqty, length, width, height, specificw' +
        'eight)'
      'VALUES'
      
        '  (:bid, :bno, :bdtlno, :subproductid, :orderno, :rate, :quantit' +
        'y, :drawqty, :wastedqty, :explan, :assqty, :length, :width, :hei' +
        'ght, :specificweight)')
    SQLDelete.Strings = (
      
        'delete tb_commissionrawsub where bid=:old_bid and bno=:old_bno a' +
        'nd bdtlno=:bdtlno and subproductid=:OLD_subproductid')
    SQLUpdate.Strings = (
      'update tb_commissionrawsub set'
      
        '  bid=:bid, bno=:bno, bdtlno=:bdtlno, subproductid=:subproductid' +
        ', orderno=:orderno'
      
        ', rate=:rate, quantity=:quantity, drawqty=:drawqty, wastedqty=:w' +
        'astedqty, explan=:explan'
      
        ', assqty=:assqty, length=:length, width=:width, height=:height, ' +
        'specificweight=:specificweight'
      '  where'
      
        '  bid=:old_bid, bno=:old_bno, bdtlno=:old_bdtlno and subproducti' +
        'd=:OLD_subproductid')
    Connection = MainDM.UniConn
    SQL.Strings = (
      'select m.*,'
      '     p.code as p_code,p.name as p_name,p.spec as p_spec,'
      
        '     u.unitname as unitname,l.unitname unitassname,m.quantity as' +
        ' needqty '
      '     from tb_commissionrawsub m  '
      '     left join td_product p on p.p_id=m.subproductid  '
      
        '     left join td_unitprice u on u.productid=m.subproductid and ' +
        'baseunit=1'
      
        '     left join td_unitprice l on (l.u_no=0 and M.subproductid=l.' +
        'productid)'
      '     where m.bid=:bid')
    CachedUpdates = True
    Options.PrepareUpdateSQL = True
    Options.SetFieldsReadOnly = False
    Options.RequiredFields = False
    Options.QueryRecCount = True
    Options.AutoPrepare = True
    Left = 268
    Top = 421
    ParamData = <
      item
        DataType = ftInteger
        Name = 'bid'
        Value = 0
      end>
    object qryRawSubbid: TIntegerField
      FieldName = 'bid'
    end
    object qryRawSubbno: TIntegerField
      FieldName = 'bno'
    end
    object qryRawSubbdtlno: TIntegerField
      FieldName = 'bdtlno'
    end
    object qryRawSubsubproductid: TIntegerField
      FieldName = 'subproductid'
    end
    object qryRawSuborderno: TStringField
      FieldName = 'orderno'
      Size = 40
    end
    object qryRawSubrate: TFloatField
      FieldName = 'rate'
    end
    object qryRawSubquantity: TFloatField
      FieldName = 'quantity'
    end
    object qryRawSubdrawqty: TFloatField
      FieldName = 'drawqty'
    end
    object qryRawSubwastedqty: TFloatField
      FieldName = 'wastedqty'
    end
    object qryRawSubexplan: TStringField
      FieldName = 'explan'
      Size = 200
    end
    object qryRawSubassqty: TFloatField
      FieldName = 'assqty'
    end
    object qryRawSublength: TFloatField
      FieldName = 'length'
    end
    object qryRawSubwidth: TFloatField
      FieldName = 'width'
    end
    object qryRawSubheight: TFloatField
      FieldName = 'height'
    end
    object qryRawSubspecificweight: TFloatField
      FieldName = 'specificweight'
    end
    object qryRawSubcustom16: TFloatField
      FieldName = 'custom16'
    end
    object qryRawSubcustom17: TFloatField
      FieldName = 'custom17'
    end
    object qryRawSubcustom18: TFloatField
      FieldName = 'custom18'
    end
    object qryRawSubcustom19: TFloatField
      FieldName = 'custom19'
    end
    object qryRawSubcustom20: TFloatField
      FieldName = 'custom20'
    end
    object qryRawSubp_code: TStringField
      FieldName = 'p_code'
      Size = 40
    end
    object qryRawSubp_name: TWideStringField
      FieldName = 'p_name'
      Size = 60
    end
    object qryRawSubp_spec: TWideStringField
      FieldName = 'p_spec'
      Size = 60
    end
    object qryRawSubunitname: TWideStringField
      FieldName = 'unitname'
      Size = 40
    end
    object qryRawSubunitassname: TWideStringField
      FieldName = 'unitassname'
      Size = 40
    end
    object qryRawSubneedqty: TFloatField
      FieldName = 'needqty'
    end
  end
end
